home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Games / Xconq 7.1.0 / src / xconq-7.1.0 / test / around.g < prev    next >
Encoding:
Text File  |  1996-07-07  |  1.1 KB  |  74 lines  |  [TEXT/R*ch]
  1. ;; This is a test of going around.
  2.  
  3. (include "standard")
  4.  
  5. (set see-all true)
  6.  
  7. (area 30 30)
  8.  
  9. (area (terrain
  10.   (by-name
  11.     (sea 0) (shallows 1) (swamp 2) (desert 3) (plains 4)
  12.     (forest 5) (mountains 6) (ice 7) (road 8) (river 9))
  13.   "10e20a"
  14.   "10e20a"
  15.   "10e20a"
  16.   "10e20a"
  17.   "10e20a"
  18.   "10ea2e7ae9a"
  19.   "10e3ae6a2e8a"
  20.   "10e4ae5a3e7a"
  21.   "10eae3ae4a4e6a"
  22.   "10e2ae3ae3a5e5a"
  23.   "10e3ae2ae3a6e4a"
  24.   "11e2ae2ae3a7e3a"
  25.   "a3e3a3ea3e2ae3a8e2a"
  26.   "2a5ea2e6ae3a9ea"
  27.   "3a5eae6ae3a10e"
  28.   "4a4eae6ae3a10e"
  29.   "5ae3ae6ae3a10e"
  30.   "6a4e6ae3a10e"
  31.   "7a3e6ae3a10e"
  32.   "16ae3a10e"
  33.   "16ae3a10e"
  34.   "16ae3a10e"
  35.   "16ae3a10e"
  36.   "11ae4ae3a10e"
  37.   "12ae3ae3a10e"
  38.   "13a4e3a10e"
  39.   "20a10e"
  40.   "20a10e"
  41.   "20a10e"
  42.   "20a10e"
  43. ))
  44.  
  45. ;; Limit to two players only.
  46.  
  47. (set sides-min 2)
  48. (set sides-max 2)
  49.  
  50. ;; Two sides, no special properties needed (?).
  51.  
  52. (side 1)
  53.  
  54. (side 2)
  55.  
  56. ;;; (no player for one side?)
  57.  
  58. (infantry 6 15 1)
  59. (troop-transport 11 19 1)
  60.  
  61. ;; Two bases, one for each side.
  62.  
  63. (base 5 15 1)
  64.  
  65. (base 25 15 2)
  66.  
  67. (set synthesis-methods ())
  68.  
  69. ;;; This motivates the AI to go chasing after the destination.
  70.  
  71. ;(scorekeeper (do last-side-wins))
  72.  
  73. (add base point-value 1)
  74.